﻿Imports System
Imports System.Web
Imports System.IO


Partial Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim FilePath As String = Server.MapPath("Admin/content.dat")

        Dim sr As StreamReader = New StreamReader(FilePath)

        Dim FileContent As String = sr.ReadToEnd()

        lblnews.Text = FileContent

        sr.Close()

    End Sub

End Class
